home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
Tech Arsenal 1
/
Tech Arsenal (Arsenal Computer).ISO
/
tek-06
/
logcopy.zip
/
SETGRAPH.INT
< prev
next >
Wrap
Text File
|
1992-08-03
|
926b
|
22 lines
INTERFACE;
UNIT SETGRAPH( gotoxy, scroll_screen_up );
(**********************************************************************)
(* *)
(* GOTOXY - Set cursor on screen at passed location *)
(* *)
(* GOTOXY( row :integer - row and column where *)
(* col :integer ) - cursor is to be moved *)
(* *)
(* Returned :nothing *)
(* *)
(**********************************************************************)
Procedure gotoxy( ROW,COL : Integer);
Procedure scroll_screen_up( nlines,ulr,ulc,lrr,lrc,attr: Integer);
END;